home *** CD-ROM | disk | FTP | other *** search
- %case buildOrder%
- %if modal%
- { %dlogname%.p% %}
- %elsif modaloneshot%
- { %dlogname%.p% %}
- %elsif modeless%
- { %dlogname%.p% %}
- %endif%
- %case sourcefile%
- %if modal%
- %genfile modalDialog dlogname%
- %elsif modaloneshot%
- %genfile modalOneShot dlogname%
- %elsif modeless%
- %genfile modelessDialog dlogname%
- %endif%
- %case init%
- %if modeless%
- Init%dlogname%;
- %endif%
- %case close%
- %if modeless%
- if whichDialog = %dlogname%Dialog then begin
- Close%dlogname%;
- end;
- %endif%
- %case filter%
- %if modeless%
- if whichDialog = %dlogname%Dialog then begin
- FilterModeless := Filter%dlogname% (whichDialog, event, itemHit);
- end;
- %endif%
- %case handleitem%
- %if modeless%
- if whichDialog = %dlogname%Dialog then begin
- Do%dlogname%Item (itemNr);
- end;
- %endif%
- %case usesmodeless%
- %dlogname%,
- %case uses%
- %MenuItemName%,
-